home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 15-02.C < prev    next >
Text File  |  1991-05-06  |  832b  |  40 lines
  1. #define RECTANGLES 200
  2. #define SWAP(a,b,temp) { temp = a; a = b; b = temp; }
  3.  
  4. main()
  5. {
  6.    int i;
  7.    int minx, maxx, miny, maxy;
  8.    int old_mode;
  9.    int temp;
  10.    int xres, yres;
  11.  
  12.    if (fg_egacheck() == 0) {
  13.       printf("This program requires EGA or VGA.\n");
  14.       exit();
  15.       }
  16.  
  17.    old_mode = fg_getmode();
  18.    fg_setmode(fg_automode());
  19.    fg_setfunc(3);
  20.  
  21.    xres = fg_getmaxx() + 1;
  22.    yres = fg_getmaxy() + 1;
  23.  
  24.    for (i = 0; i < RECTANGLES; i++) {
  25.       minx = rand() % xres;
  26.       maxx = rand() % xres;
  27.       miny = rand() % yres;
  28.       maxy = rand() % yres;
  29.       if (minx > maxx)
  30.          SWAP(minx,maxx,temp);
  31.       if (miny > maxy)
  32.          SWAP(miny,maxy,temp);
  33.       fg_setcolor(rand()%16);
  34.       fg_rect(minx,maxx,miny,maxy);
  35.       }
  36.  
  37.    fg_setmode(old_mode);
  38.    fg_reset();
  39. }
  40.